perm filename MFF.DAT[SCR,LCS] blob sn#267315 filedate 1977-03-02 generic text, type T, neo UTF8
 
  < MFF  .SCR  --  RANDOM NUMBER=     1
 PLAY;
 XXXXXXXXXXXXXXXXXXXXX                                                      
 TOOT      0.00     1.00 C       1000.0
;PRINT(P1);< TOOT    1
  SEG(F1);0 0 1 50 0 100;
;PRINT(P1);< DUMY    1
 TOOT      1.00     1.00 C    
;PRINT(P1);< TOOT    2
  SEG(F1);0 0 1 50 0 100;
;PRINT(P1);< DUMY    2
 TOOT      2.00     1.00 C    
;PRINT(P1);< TOOT    3
  SEG(F1);0 0 1 50 0 100;
;PRINT(P1);< DUMY    3
 TOOT      3.00     1.00 C    
;PRINT(P1);< TOOT    4
  SEG(F1);0 0 1 50 0 100;
;PRINT(P1);< DUMY    4
 TOOT      4.00     1.00 C    
;PRINT(P1);< TOOT    5
  SEG(F1);0 0 1 50 0 100;
;PRINT(P1);< DUMY    5
 TOOT      5.00     1.00 C    
;PRINT(P1);< TOOT    6
  SEG(F1);0 0 1 50 0 100;
;PRINT(P1);< DUMY    6
 TOOT      6.00     1.00 C    
;PRINT(P1);< TOOT    7
  SEG(F1);0 0 1 50 0 100;
;PRINT(P1);< DUMY    7
 TOOT      7.00     1.00 C    
;PRINT(P1);< TOOT    8
  SEG(F1);0 0 1 50 0 100;
;PRINT(P1);< DUMY    8
 TOOT      8.00     1.00 C    
;PRINT(P1);< TOOT    9
  SEG(F1);0 0 1 50 0 100;
;PRINT(P1);< DUMY    9
 TOOT      9.00     1.00 C    
;PRINT(P1);< TOOT   10
  SEG(F1);0 0 1 50 0 100;
;PRINT(P1);< DUMY   10
 FINISH; < MFF  .SCR